home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / arrays / vbstrapi / ownerfor.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-06-24  |  1.4 KB  |  50 lines
  1. VERSION 2.00
  2. Begin Form OwnerForm 
  3.    BorderStyle     =   3  'Fixed Double
  4.    Caption         =   "String Object Owner List"
  5.    ClientHeight    =   3345
  6.    ClientLeft      =   1245
  7.    ClientTop       =   2250
  8.    ClientWidth     =   8310
  9.    Height          =   3720
  10.    Left            =   1200
  11.    LinkTopic       =   "Form1"
  12.    ScaleHeight     =   3345
  13.    ScaleWidth      =   8310
  14.    Top             =   1920
  15.    Width           =   8400
  16.    Begin CommandButton biClose 
  17.       Caption         =   "&Close"
  18.       Height          =   345
  19.       Left            =   90
  20.       TabIndex        =   1
  21.       Top             =   60
  22.       Width           =   945
  23.    End
  24.    Begin ListBox Owners 
  25.       FontBold        =   0   'False
  26.       FontItalic      =   0   'False
  27.       FontName        =   "Fixedsys"
  28.       FontSize        =   9
  29.       FontStrikethru  =   0   'False
  30.       FontUnderline   =   0   'False
  31.       Height          =   2730
  32.       Left            =   90
  33.       TabIndex        =   0
  34.       Top             =   480
  35.       Width           =   8115
  36.    End
  37. Option Explicit
  38. Sub biClose_Click ()
  39.     Unload Me
  40. End Sub
  41. Sub Form_Load ()
  42.     ShowCatStrOwners Owners
  43. End Sub
  44. Sub ShowCatStrOwners (HListBox As ListBox)
  45. '    HListBox.Clear
  46. '    If CatStrOwners(HListBox.hWnd) < 0 Then
  47. '        MsgBox "Ooops"
  48. '    End If
  49. End Sub
  50.